
package com.jiangyao.common.utils;

import java.math.BigDecimal;
import java.math.RoundingMode;
import java.text.DecimalFormat;

/**
 * 价格计算工具
 */
public class PriceCalculateUtil {

	//默认除法运算精度
	private static final int DEF_DIV_SCALE = 10;

	/**
	 * 提供精确的加法运算。
	 *
	 * @param v1 被加数
	 * @param v2 加数
	 * @return 两个参数的和
	 */
	public static Double add(Double v1, Double v2) {
		BigDecimal b1 = new BigDecimal(Double.toString(v1));
		BigDecimal b2 = new BigDecimal(Double.toString(v2));
		return b1.add(b2).doubleValue();
	}

	/**
	 * 提供精确的减法运算。
	 *
	 * @param v1 被减数
	 * @param v2 减数
	 * @return 两个参数的差
	 */
	public static Double sub(Double v1, Double v2) {
		BigDecimal b1 = new BigDecimal(Double.toString(v1));
		BigDecimal b2 = new BigDecimal(Double.toString(v2));
		return b1.subtract(b2).doubleValue();
	}

	/**
	 * 提供精确的乘法运算。
	 *
	 * @param v1 被乘数
	 * @param v2 乘数
	 * @return 两个参数的积
	 */
	public static Double mul(Double v1, Double v2) {
		BigDecimal b1 = new BigDecimal(Double.toString(v1));
		BigDecimal b2 = new BigDecimal(Double.toString(v2));
		return b1.multiply(b2).doubleValue();
	}

	/**
	 * 提供（相对）精确的除法运算，当发生除不尽的情况时，精确到
	 * 小数点以后10位，以后的数字四舍五入。
	 *
	 * @param v1 被除数
	 * @param v2 除数
	 * @return 两个参数的商
	 */
	public static Double div(Double v1, Double v2) {
		return div(v1, v2, DEF_DIV_SCALE);
	}

	/**
	 * 提供（相对）精确的除法运算。当发生除不尽的情况时，由scale参数指
	 * 定精度，以后的数字四舍五入。
	 *
	 * @param v1    被除数
	 * @param v2    除数
	 * @param scale 表示表示需要精确到小数点以后几位。
	 * @return 两个参数的商
	 */
	public static Double div(Double v1, Double v2, int scale) {
		if (scale < 0) {
			throw new IllegalArgumentException(
					"The scale must be a positive integer or zero");
		}
		BigDecimal b1 = new BigDecimal(Double.toString(v1));
		BigDecimal b2 = new BigDecimal(Double.toString(v2));
		return b1.divide(b2, scale, BigDecimal.ROUND_HALF_UP).doubleValue();
	}

	/**
	 * 提供精确的小数位四舍五入处理。
	 *
	 * @param v     需要四舍五入的数字
	 * @param scale 小数点后保留几位
	 * @return 四舍五入后的结果
	 */
	public static Double round(Double v, int scale) {
		if (scale < 0) {
			throw new IllegalArgumentException("The scale must be a positive integer or zero");
		}
		BigDecimal b = new BigDecimal(Double.toString(v));
		BigDecimal one = new BigDecimal("1");
		return b.divide(one, scale, BigDecimal.ROUND_HALF_UP).doubleValue();
	}

	/**
	 * 提供（相对）精确的加法运算，并对结果按指定小位数进行四舍五入
	 *
	 * @param v1    被加数
	 * @param v2    加数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的和
	 */
	public static double addRound(double v1, double v2, int scale) {
		if (scale == 0) {
			return Double.parseDouble(DF_0_HALF_UP.format(v1 + v2));
		} else {
			return Double.parseDouble(DF_2_HALF_UP.format(v1 + v2));
		}
	}

	/**
	 * 提供（相对）精确的加法运算，并对结果按指定小位数进行向下截取
	 *
	 * @param v1    被加数
	 * @param v2    加数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的和
	 */
	public static double addRoundDown(double v1, double v2, int scale) {
		if (scale == 0) {
			return Double.parseDouble(DF_0_DOWN.format(v1 + v2));
		} else {
			return Double.parseDouble(DF_2_DOWN.format(v1 + v2));
		}
	}

	/**
	 * 提供（相对）精确的加法运算，并对结果按指定小位数进行向上截取
	 *
	 * @param v1    被加数
	 * @param v2    加数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的和
	 */
	public static double addRoundUp(double v1, double v2, int scale) {
		if (scale == 0) {
			return Double.parseDouble(DF_0_UP.format(v1 + v2));
		} else {
			return Double.parseDouble(DF_2_UP.format(v1 + v2));
		}
	}

	/**
	 * 提供精确的减法运算
	 *
	 * @param v1 被减数
	 * @param v2 减数
	 * @return 两个参数的差
	 */
	public static double substract(double v1, double v2) {
		return v1 - v2;
	}

	/**
	 * 提供（相对）精确的减法运算，并对结果按指定小位数进行四舍五入
	 *
	 * @param v1    被减数
	 * @param v2    减数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的差
	 */
	public static double substractRound(double v1, double v2, int scale) {
		if (scale == 0) {
			return Double.parseDouble(DF_0_HALF_UP.format(v1 - v2));
		} else {
			return Double.parseDouble(DF_2_HALF_UP.format(v1 - v2));
		}
	}

	/**
	 * 提供（相对）精确的减法运算，并对结果按指定小位数进行向下截取
	 *
	 * @param v1    被减数
	 * @param v2    减数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的差
	 */
	public static double substractRoundDown(double v1, double v2, int scale) {
		if (scale == 0) {
			return Double.parseDouble(DF_0_DOWN.format(v1 - v2));
		} else {
			return Double.parseDouble(DF_2_DOWN.format(v1 - v2));
		}
	}

	/**
	 * 提供（相对）精确的减法运算，并对结果按指定小位数进行向上截取
	 *
	 * @param v1    被减数
	 * @param v2    减数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的差
	 */
	public static double substractRoundUp(double v1, double v2, int scale) {
		if (scale == 0) {
			return Double.parseDouble(DF_0_UP.format(v1 - v2));
		} else {
			return Double.parseDouble(DF_2_UP.format(v1 - v2));
		}
	}

	/**
	 * 提供精确的乘法运算
	 *
	 * @param v1 被乘数
	 * @param v2 乘数
	 * @return 两个参数的积
	 */
	public static double multiply(double v1, double v2) {
		return new BigDecimal(String.valueOf(v1)).multiply(new BigDecimal(String.valueOf(v2))).doubleValue();
	}

	/**
	 * 提供（相对）精确的乘法运算，并对结果按指定小位数进行四舍五入
	 *
	 * @param v1    被乘数
	 * @param v2    乘数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的积
	 */
	public static double multiplyRound(double v1, double v2, int scale) {
		BigDecimal result = new BigDecimal(String.valueOf(v1)).multiply(new BigDecimal(String.valueOf(v2)));
		if (scale == 0) {
			return Double.parseDouble(DF_0_HALF_UP.format(result));
		} else {
			return Double.parseDouble(DF_2_HALF_UP.format(result));
		}
	}

	/**
	 * 提供（相对）精确的乘法运算，并对结果按指定小位数进行向下截取
	 *
	 * @param v1    被乘数
	 * @param v2    乘数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的积
	 */
	public static double multiplyRoundDown(double v1, double v2, int scale) {
		BigDecimal result = new BigDecimal(String.valueOf(v1)).multiply(new BigDecimal(String.valueOf(v2)));
		if (scale == 0) {
			return Double.parseDouble(DF_0_DOWN.format(result));
		} else {
			return Double.parseDouble(DF_2_DOWN.format(result));
		}
	}

	/**
	 * 提供（相对）精确的乘法运算，并对结果按指定小位数进行向上截取
	 *
	 * @param v1    被乘数
	 * @param v2    乘数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的积
	 */
	public static double multiplyRoundUp(double v1, double v2, int scale) {
		BigDecimal result = new BigDecimal(String.valueOf(v1)).multiply(new BigDecimal(String.valueOf(v2)));
		if (scale == 0) {
			return Double.parseDouble(DF_0_UP.format(result));
		} else {
			return Double.parseDouble(DF_2_UP.format(result));
		}
	}

	/**
	 * 提供精确的除法运算
	 * 注意：如果无法表示准确的商值（因为它有无穷的十进制扩展），则抛出 ArithmeticException。
	 *
	 * @param v1 被除数
	 * @param v2 除数
	 * @return 两个参数的商
	 */
	public static double divide(double v1, double v2) {
		return new BigDecimal(String.valueOf(v1)).divide(new BigDecimal(String.valueOf(v2))).doubleValue();
	}

	/**
	 * 提供（相对）精确的除法运算，并对结果按指定小位数进行四舍五入
	 *
	 * @param v1    被除数
	 * @param v2    除数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的商
	 */
	public static double divideRound(double v1, double v2, int scale) {
		BigDecimal result = new BigDecimal(String.valueOf(v1)).divide(new BigDecimal(String.valueOf(v2)), 10, BigDecimal.ROUND_HALF_UP);
		if (scale == 0) {
			return Double.parseDouble(DF_0_HALF_UP.format(result));
		} else {
			return Double.parseDouble(DF_2_HALF_UP.format(result));
		}
	}

	/**
	 * 提供（相对）精确的除法运算，并对结果按指定小位数进行向下截取
	 *
	 * @param v1    被除数
	 * @param v2    除数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的商
	 */
	public static double divideRoundDown(double v1, double v2, int scale) {
		BigDecimal result = new BigDecimal(String.valueOf(v1)).divide(new BigDecimal(String.valueOf(v2)), 10, BigDecimal.ROUND_HALF_UP);
		if (scale == 0) {
			return Double.parseDouble(DF_0_DOWN.format(result));
		} else {
			return Double.parseDouble(DF_2_DOWN.format(result));
		}
	}

	/**
	 * 提供（相对）精确的除法运算，并对结果按指定小位数进行向上截取
	 *
	 * @param v1    被除数
	 * @param v2    除数
	 * @param scale 要保留几位小数位，0或者2，非0自动设置为2
	 * @return 两个参数的商
	 */
	public static double divideRoundUp(double v1, double v2, int scale) {
		BigDecimal result = new BigDecimal(String.valueOf(v1)).divide(new BigDecimal(String.valueOf(v2)), 10, BigDecimal.ROUND_HALF_UP);
		if (scale == 0) {
			return Double.parseDouble(DF_0_UP.format(result));
		} else {
			return Double.parseDouble(DF_2_UP.format(result));
		}
	}

	/**
	 * 对值进行格式化：0.00
	 * 保留两个小数位
	 */
	public static String format2p(Double v) {
		if (v == null) {
			return "0.00";
		}
		return DF_2_UP.format(v);
	}

	/**
	 * 对值进行格式化：0.00
	 * 保留两个小数位          向下取值
	 */
	public static String format2pDown(Double v) {
		if (v == null) {
			return "0.00";
		}
		return DF_2_DOWN.format(v);
	}

	/**
	 * 对值进行格式化：0000
	 * 不保留小数位
	 */
	public static String format0p(Double v) {
		if (v == null) {
			return "0";
		}
		return DF_0_UP.format(v);
	}

	/**
	 * 对值进行格式化：0.00
	 * 保留两个小数位
	 */
	public static double format2p_d(Double v) {
		if (v == null) {
			return 0.0;
		}
		return Double.parseDouble(DF_2_UP.format(v));
	}

	/**
	 * 对值进行格式化：0000
	 * 不保留小数位
	 */
	public static double format0p_d(Double v) {
		if (v == null) {
			return 0.0;
		}
		return Double.parseDouble(DF_0_UP.format(v));
	}

	/**
	 * 对值进行格式化：0.0
	 * 保留1个小数位          四舍五入
	 */
	public static String format1pHalfUp(Double v) {
		if (v == null) {
			return "0.0";
		}
		return DF_1_HALF_UP.format(v);
	}

	/**
	 * 提供（相对）精确的除法运算，并对结果按指定小位数进行向上截取
	 *
	 * @param v1    被除数
	 * @param v2    除数
	 * @param scale 要保留几位小数位，0、1、2，非0 1 2自动设置为2
	 * @return 两个参数的商
	 */
	public static String divideRoundHalfUp(BigDecimal v1, BigDecimal v2, int scale) {
		BigDecimal result = v1.divide(v2, 10, BigDecimal.ROUND_HALF_UP);
		if (scale == 0) {
			return DF_0_HALF_UP.format(result);
		} else if (scale == 1) {
			return DF_1_HALF_UP.format(result);
		} else {
			return DF_2_HALF_UP.format(result);
		}
	}

	/**
	 * 提供（相对）精确的除法运算，并对结果按指定小位数进行向上截取
	 *
	 * @param v1    被除数
	 * @param v2    除数
	 * @param scale 要保留几位小数位，0、1、2，非0 1 2自动设置为2
	 * @return 两个参数的商
	 */
	public static String divideRoundHalfUp(Integer v1, Integer v2, int scale) {
		return divideRoundHalfUp(new BigDecimal(v1), new BigDecimal(v2), scale);
	}

	/**
	 * 将数值格式化为以w为单位的字符串,如：10000=1w，11000=1.1w 33333=3.33w
	 * 最多两位小数，小数位为0时省略
	 *
	 * @param num 数值
	 * @return 结果
	 */
	public static String formatToW(long num) {
		if (num < 10000) {
			return String.valueOf(num);
		}
		String numStr = new DecimalFormat("#.00").format(divideRoundDown(num, 10000, 2));
		String[] ss = numStr.split("\\.");
		if ("00".equals(ss[1])) {
			return ss[0] + "w";
		} else if ('0' == (ss[1].charAt(1))) {
			return ss[0] + "." + ss[1].charAt(0) + "w";
		} else {
			return numStr + "w";
		}
	}


	/**
	 * 不保留小数，四舍五入
	 */
	private final static DecimalFormat DF_0_HALF_UP = new DecimalFormat("0");
	private final static DecimalFormat DF_0_UP = new DecimalFormat("0");
	private final static DecimalFormat DF_0_DOWN = new DecimalFormat("0");
	private final static DecimalFormat DF_2_HALF_UP = new DecimalFormat("0.00");
	private final static DecimalFormat DF_2_UP = new DecimalFormat("0.00");
	private final static DecimalFormat DF_2_DOWN = new DecimalFormat("0.00");
	private final static DecimalFormat DF_1_HALF_UP = new DecimalFormat("0.0");

	static {
		DF_0_HALF_UP.setRoundingMode(RoundingMode.HALF_UP);

		DF_0_UP.setRoundingMode(RoundingMode.UP);

		DF_0_DOWN.setRoundingMode(RoundingMode.DOWN);

		DF_2_HALF_UP.setRoundingMode(RoundingMode.HALF_UP);

		DF_2_UP.setRoundingMode(RoundingMode.UP);

		DF_2_DOWN.setRoundingMode(RoundingMode.DOWN);

		DF_1_HALF_UP.setRoundingMode(RoundingMode.HALF_UP);
	}

}
